home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Commodities / CapShift / Install / Italiano < prev   
Encoding:
Text File  |  1996-09-27  |  1.7 KB  |  88 lines
  1. ; Programma di installazione per l' Installer standard Commodore
  2.  
  3. (set local-help (cat "Scegliendo \"Sì\" tutti i messaggi di CapShift saranno"
  4.                      " tradotti in italiano.\nScegliendo \"No\", i messaggi"
  5.                      " saranno in inglese.\nNotate che la vostra lingua di"
  6.                      " sistema deve essere l'italiano, altrimenti CapShift"
  7.                      " continuerà ad essere in inglese."))
  8.  
  9. (complete 0)
  10.  
  11. (set name
  12.     (askdir
  13.         (prompt "Dove volete installare CapShift ?")
  14.         (help @askdir-help)
  15.         (default "SYS:WBStartup")
  16.     )
  17. )
  18.  
  19. (set @default-dest name)
  20.  
  21. (set vernum (/ (getversion) 65536))   ; se version >37: c'è localizzazione
  22.  
  23. (if (> vernum 37)
  24.     (set local
  25.         (askbool
  26.             (prompt "Volete installare il file di supporto per la lingua italiana ?")
  27.             (help local-help)
  28.             (choices "Sì" "No")
  29.             (default 1)
  30.         )
  31.     )
  32.     (set local 0)
  33. )
  34.  
  35. (if local
  36.     (if (and (= @user-level 2) (exists "LOCALE:catalogs/italiano"))
  37.         (set sysdest
  38.             (askchoice
  39.                 (prompt "Dove volete installare il file di localizzazione ?")
  40.                 (help @askchoice-help)
  41.                 (choices "nello stesso cassetto di CapShift" "in LOCALE:")
  42.                 (default 1)
  43.             )
  44.         )
  45.         (if (= name "SYS:WBStartup")
  46.             (set sysdest 1)
  47.             (set sysdest 0)
  48.         )
  49.     )
  50. )
  51.  
  52. (if (not (exists "LOCALE:catalogs/italiano"))
  53.     (set sysdest 0)
  54. )
  55.  
  56. (complete 50)
  57.  
  58. (copyfiles
  59.     (infos)
  60.     (source "/CapShift")
  61.     (dest name)
  62. )
  63.  
  64. (tooltype
  65.     (dest (tackon name "CapShift"))
  66.     (noposition)
  67. )
  68.  
  69. (complete 80)
  70.  
  71. (if local
  72.      (if sysdest
  73.         (copyfiles
  74.             (source "/catalogs/italiano/CapShift.catalog")
  75.             (dest "LOCALE:catalogs/italiano")
  76.         )
  77.         (
  78.             (makedir (tackon name "catalogs"))
  79.             (copyfiles
  80.                 (source "/catalogs/italiano/CapShift.catalog")
  81.                 (dest (tackon name "catalogs/italiano"))
  82.             )
  83.         )
  84.     )
  85. )
  86.  
  87. (complete 100)
  88.